﻿Public Class StateProjectFormInPlanning
    Inherits ProjectStateForm
    Public Sub New(ByRef form As ProjectForm)
        MyBase.New(form)
    End Sub

    Public Overrides Sub setForm()
        form.txtProjectName.Enabled = True
        form.rtxtDescription.Enabled = True
        'form.dtpStartDate.Value = Nothing
        form.dtpStartDate.Enabled = True
        'form.dtpEndDate.Value = Nothing
        form.dtpEndDate.Enabled = True
        form.txtCreateDate.Enabled = False
        form.txtCreateDate.Text = DateTime.Now().Date()
        form.cboProjectResponsibility.Enabled = True
        form.txtState().Enabled = False

        form.cboResources.Enabled = True
        form.dtpFromDate.Enabled = True
        form.dtpToDate.Enabled = True
        form.lbAvailableRoles.Enabled = True
        form.cmdAdd.Enabled = True
        form.cmdRemove.Enabled = True
        form.dgvProjectMembers.Enabled = True

        form.cboActivity.Enabled = True
        form.dtpEstimatedStartDate.Enabled = True
        form.dtpEstimatedEndDate.Enabled = True
        form.dtpRealStartDate.Enabled = False
        form.dtpRealEndDate.Enabled = False
        form.cmdAgregar.Enabled = True
        form.cmdQuitar.Enabled = True
        form.dgvActivities.Enabled = True

        form.cmdStartProject.Visible = True
        form.cmdCancelProject.Visible = True
        form.cmdSave.Enabled = True
        form.cmdCancel.Enabled = True
        'form.cmdStartProject.Visible = False
    End Sub

 
End Class
